#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <netdb.h> 
#include <iostream>
#include <unistd.h>
#include <errno.h>
#include "Frame.h"
static const unsigned short PORT=666;

void error(const char *msg)
{
    perror(msg);
    exit(0);
    
}

int listener(int&);

void reset_conexion(int &sockfd)
{
    std::cout<<"Esperando que me reseteen"<<std::endl;
    close(sockfd);
    sockfd = socket(AF_INET, SOCK_STREAM, 0);
    char buffer[255];
    char nombre[64]="Reconexion";
    int newsockfd, n_bytes_r;
    struct sockaddr_in serv_addr, cli_addr;
    unsigned int cli_leng=sizeof(cli_addr);
    bzero((char *) &buffer, sizeof(buffer));
    bzero((char *) &serv_addr, sizeof(serv_addr));
    bzero((char *) &cli_addr, sizeof(cli_addr));
    newsockfd = socket(AF_INET, SOCK_DGRAM, 0);
    serv_addr.sin_family = AF_INET;
    serv_addr.sin_addr.s_addr = INADDR_ANY;
    serv_addr.sin_port = htons(PORT);
    
    bind(newsockfd, (struct sockaddr *) &serv_addr,sizeof(serv_addr));
    n_bytes_r=recvfrom(newsockfd, &buffer,sizeof(buffer), 0, (struct sockaddr *)&cli_addr, &cli_leng);
    std::cout<<"N bytes recibidos: "<<n_bytes_r<<std::endl;
    
    if(n_bytes_r>0){
     
        if((strcmp(buffer,"ready"))==0)
        {
            cli_addr.sin_port=htons(3000);
            std::cout<<"Siiiii"<<std::endl;
            std::cout<<inet_ntoa(cli_addr.sin_addr)<<std::endl;
            connect(sockfd,(struct sockaddr *) &cli_addr,sizeof(cli_addr)); 
            std::cout<<"Yaaaa"<<std::endl;
            write(sockfd,nombre,sizeof(nombre));
            close(newsockfd);
             std::cout<<"Abul"<<std::endl;
            listener(sockfd);
            
        }   
    }
    else
    {
        error("ERROR writing to socket");
    }   
}

int listener(int &sockfd){
    int n;
    char buffer[255];
    bzero(buffer,255);
    struct timeval timeout;      
    timeout.tv_sec = 2;
    timeout.tv_usec = 0;
    if (setsockopt (sockfd, SOL_SOCKET, SO_RCVTIMEO, (char *)&timeout,
                sizeof(timeout)) < 0)
        error("setsockopt failed\n"); 
    while(true){
    sleep(1);
    n = read(sockfd,buffer,255);
        
    if (EAGAIN == -1 || n<0){ 
         
         reset_conexion(sockfd);
    }
    else
        std::cout<<buffer;
        bzero(buffer,255);
    }
    
    close(sockfd);
    return 0;
    
}


int main(int argc, char *argv[])
{
    int sockfd, portno, n;
    struct sockaddr_in serv_addr;
    struct hostent *server;
    int optval;
    socklen_t optlen = sizeof(optval);
    char nombre[64];
    if (argc < 3) {
       fprintf(stderr,"usage %s hostname port\n", argv[0]);
       exit(0);
    }
    portno = atoi(argv[2]);
    sockfd = socket(AF_INET, SOCK_STREAM, 0);
    if (sockfd < 0) 
        error("ERROR opening socket");
    server = gethostbyname(argv[1]);
    optval = 1;
   optlen = sizeof(optval);
   if(setsockopt(sockfd, SOL_SOCKET, SO_KEEPALIVE, &optval, optlen) < 0) 
      perror("setsockopt()");
    
   
   if (server == NULL) {
        fprintf(stderr,"ERROR, no such host\n");
        exit(0);
    }
    bzero((char *) &serv_addr, sizeof(serv_addr));
    serv_addr.sin_family = AF_INET;
    bcopy((char *)server->h_addr, 
         (char *)&serv_addr.sin_addr.s_addr,
         server->h_length);
    serv_addr.sin_port = htons(portno);
    if (connect(sockfd,(struct sockaddr *) &serv_addr,sizeof(serv_addr)) < 0) 
        error("ERROR connecting");
    printf("Cuál es su nombre?  ");
    bzero(nombre,64);
    fgets(nombre,64,stdin);
    n = write(sockfd,nombre,sizeof(nombre));
    if (n < 0) 
         error("ERROR writing to socket");
    bzero(nombre,64);
    listener(sockfd);
    
}
